package com.iplant.basic.serviceImpl;

import com.alibaba.fastjson.JSON;
import com.alibaba.fastjson.JSONObject;
import com.iplant.base.utils.general.LockHelper;
import com.iplant.base.utils.general.StringUtils;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.stereotype.Component;

import javax.websocket.*;
import javax.websocket.server.PathParam;
import javax.websocket.server.ServerEndpoint;
import java.util.concurrent.ConcurrentHashMap;

@ServerEndpoint("/websocket/{userId}")
@Component
public class WebSocketServer {

    private static Logger logger = LoggerFactory.getLogger(WebSocketServer.class);

    private static LockHelper mLockHelper = LockHelper.getLock(WebSocketServer.class);
    /**
     * 静态变量，用来记录当前在线连接数。应该把它设计成线程安全的。
     */
    private static int onlineCount = 0;
    /**
     * concurrent包的线程安全Set，用来存放每个客户端对应的MyWebSocket对象。
     * KEY clientID
     */
    private static ConcurrentHashMap<String, WebSocketServer> webSocketMap = new ConcurrentHashMap<>();
    /**
     * 与某个客户端的连接会话，需要通过它来给客户端发送数据
     */
    private Session session;
    /**
     * 接收userId
     */
    private String userId = "";

    /**
     * 连接建立成功调用的方法
     */
    @OnOpen
    public void onOpen(Session session, @PathParam("userId") String userId) {
        try {
            this.session = session;
            this.userId = userId;
            synchronized (mLockHelper){
                if (webSocketMap.containsKey(userId)) {
                    webSocketMap.get(userId).session.close();
                    webSocketMap.remove(userId);
                    webSocketMap.put(userId, this);
                    //加入set中
                } else {
                    webSocketMap.put(userId, this);
                    //加入set中
                    addOnlineCount();
                    //在线数加1
                }
            }


            logger.info("用户连接:" + userId + ",当前在线人数为:" + getOnlineCount());

            sendMessage("连接成功");
        } catch (Exception ex) {
            logger.error("onOpen", ex);
        }
    }

    /**
     * 连接关闭调用的方法
     */
    @OnClose
    public void onClose() {
        synchronized (mLockHelper) {
            if (webSocketMap.containsKey(userId)) {
                webSocketMap.remove(userId);
                //从set中删除
                subOnlineCount();
            }
        }
        logger.info("用户退出:" + userId + ",当前在线人数为:" + getOnlineCount());
    }

    /**
     * 收到客户端消息后调用的方法
     *
     * @param message 客户端发送过来的消息
     */
    @OnMessage
    public void onMessage(String message, Session session) {
        logger.info("用户消息:" + userId + ",报文:" + message);
        //可以群发消息
        //消息保存到数据库、redis
        if (StringUtils.isNotEmpty(message)) {
            try {
                //解析发送的报文
                JSONObject jsonObject = JSON.parseObject(message);
                //追加发送人(防止串改)
                jsonObject.put("fromUserId", this.userId);
                String toUserId = jsonObject.getString("toUserId");
                //传送给对应toUserId用户的websocket
                if (StringUtils.isNotEmpty(toUserId) && webSocketMap.containsKey(toUserId)) {
                    logger.info("请求的userId:" + toUserId + "在该服务器上");
                    webSocketMap.get(toUserId).sendMessage(jsonObject.toJSONString());
                } else {
                    logger.error("请求的userId:" + toUserId + "不在该服务器上");
                    //否则不在这个服务器上，发送到mysql或者redis
                }
            } catch (Exception e) {
                e.printStackTrace();
            }
        }
    }

    /**
     * @param session
     * @param error
     */
    @OnError
    public void onError(Session session, Throwable error) {
        logger.error("用户错误:" + this.userId + ",原因:" + error.getMessage());
    }

    /**
     * 实现服务器主动推送
     */
    public void sendMessage(String message) {
        try {
            this.session.getBasicRemote().sendText(message);
        } catch (Exception ex) {
            logger.error("sendMessage", ex);
        }
    }

    /**
     * 实现服务器主动推送（广播）
     */
    public static void sendMessageAll(String message) {
        try {
            WebSocketServer webSocketServer;
            synchronized (mLockHelper){
                for (String wUserId : webSocketMap.keySet()) {
                    webSocketServer = webSocketMap.get(wUserId);
                    webSocketServer.sendMessage(message);
                }
            }
        } catch (Exception ex) {
            logger.error("sendMessageAll", ex);
        }
    }

    /**
     * 发送自定义消息
     */
    public static boolean sendInfo(String message, @PathParam("userId") String userId) {
        boolean wResult = false;
        try {
//            logger.info("发送消息到:" + userId + "，报文:" + message);
            if (StringUtils.isNotEmpty(userId) && webSocketMap.containsKey(userId)) {
                webSocketMap.get(userId).sendMessage(message);
                wResult = true;
            }
//            else {
//                logger.info("用户" + userId + ",不在线！");
//            }
        } catch (Exception ex) {
            logger.error("getDBSQL", ex);
        }
        return wResult;
    }

    public static  int getOnlineCount() {
        return onlineCount;
    }

    public static  void addOnlineCount() {
        onlineCount++;
    }

    public static  void subOnlineCount() {
        onlineCount--;
    }
}
